home *** CD-ROM | disk | FTP | other *** search
/ AmigActive 22 / AACD 22.iso / AACD / Programming / powerd / lib / chunky.lha / chunky_ppc / FillChunky.ass < prev    next >
Encoding:
Text File  |  1980-01-24  |  419 b   |  31 lines
  1. # FillChunky(chunky:r3:PTR TO chunky,colour:r4:LONG)
  2.  
  3.     .text
  4.     .global    _FillChunky
  5.  
  6. _FillChunky:
  7.     andi.    r4,r4,0xff
  8.     slwi    r5,r4,8
  9.     ori    r4,r4,r5
  10.     slwi    r5,r4,16
  11.     ori    r4,r4,r5        # we have $cocococo in r4
  12.  
  13.     mfctr    r9
  14.  
  15.     lwz    r5,4(r3)
  16.     lwz    r0,0(r3)
  17.     mullw    r5,r5,r0
  18.     srwi    r5,r5,2
  19.     mtctr    r5
  20.  
  21.     lwz    r3,8(r3)
  22.     subi    r3,r3,4
  23.  
  24. .loop:    stwu    r4,4(r3)
  25.     bdnz    .loop
  26.     mtctr    r9
  27.     blr
  28.  
  29.     .type    _FillChunky,@function
  30.     .size    _FillChunky,$-_FillChunky
  31.